home *** CD-ROM | disk | FTP | other *** search
/ MaxiMac 2000 June / MaxiMac 103.iso / KitWeb / Club Internet / Logiciels d'installation / Club-Internet / Dom.scp < prev    next >
Encoding:
Text File  |  1998-09-04  |  841 b   |  63 lines  |  [TEXT/ttxt]
  1. !
  2. @ANSWER
  3. @HANGUP
  4. EXIT 0
  5. !
  6. @ORIGINATE
  7. !
  8. CHRDELAY 1
  9. !
  10. @LABEL 10
  11. MATCHCLR
  12. MATCHSTR 1 11 "er?"
  13. MATCHREAD 300
  14. NOTE "Le script de connexion n’a pu identifier \34er?\34" 3
  15. JUMP 99
  16. !
  17. @LABEL 11
  18. PAUSE 1
  19. WRITE "clubint\13"
  20. !
  21. @LABEL 12
  22. MATCHCLR
  23. MATCHSTR 1 13 "ogin: "
  24. MATCHREAD 300
  25. NOTE "Le script de connexion n’a pu identifier \34ogin:\34" 3
  26. JUMP 99
  27. !
  28. @LABEL 13
  29. IFSTR 11 14 "<Invité>"
  30. IFSTR 11 14 ""
  31. PAUSE 1
  32. WRITE "^u\13"
  33. JUMP 15
  34. !
  35. @LABEL 14
  36. ASK 0 "Veuillez entrer votre nom : "
  37. WRITE "^*\13"
  38. !
  39. @LABEL 15
  40. MATCHCLR
  41. MATCHSTR 1 16 "assword: "
  42. MATCHREAD 300
  43. NOTE "Le script de connexion n’a pu identifier \34assword:\34" 3
  44. JUMP 99
  45. !
  46. @LABEL 16
  47. IFSTR 12 17 ""
  48. PAUSE 1
  49. WRITE "^p\13"
  50. JUMP 90
  51. !
  52. @LABEL 17
  53. ASK 1 "Veuillez entrer votre mot de passe : "
  54. WRITE "^*\13"
  55. !
  56. @LABEL 90
  57. PAUSE 1
  58. EXIT 0
  59. !
  60. @LABEL 99
  61. PAUSE 60
  62. EXIT -6002 "Le script de connexion a échoué."
  63.